package cn.com.libertymutual.core.util;

import java.util.Calendar;
import java.util.Date;

/**
 * 
 * <p>自定义日历类</p>
 *
 * <p>Copyright: 版权所有 (c) 2002 - 2008<br>

 *
 * @author yl
 * @version 2011-6-29
 */
class ChineseCalendar { 
  // Array lIntLunarDay is stored in the monthly day information in every year from 1901 to 2100 of the lunar calendar, 
  // The lunar calendar can only be 29 or 30 days every month, express with 12(or 13) pieces of binary bit in one year, 
  // it is 30 days for 1 form in the corresponding location , otherwise it is 29 days 
  private static final int[] iLunarMonthDaysTable = { 
      0x4ae0, 0xa570, 0x5268, 0xd260, 0xd950, 0x6aa8, 0x56a0, 0x9ad0, 0x4ae8, 0x4ae0, // 1910 
      0xa4d8, 0xa4d0, 0xd250, 0xd548, 0xb550, 0x56a0, 0x96d0, 0x95b0, 0x49b8, 0x49b0, // 1920 
      0xa4b0, 0xb258, 0x6a50, 0x6d40, 0xada8, 0x2b60, 0x9570, 0x4978, 0x4970, 0x64b0, // 1930 
      0xd4a0, 0xea50, 0x6d48, 0x5ad0, 0x2b60, 0x9370, 0x92e0, 0xc968, 0xc950, 0xd4a0, // 1940 
      0xda50, 0xb550, 0x56a0, 0xaad8, 0x25d0, 0x92d0, 0xc958, 0xa950, 0xb4a8, 0x6ca0, // 1950 
      0xb550, 0x55a8, 0x4da0, 0xa5b0, 0x52b8, 0x52b0, 0xa950, 0xe950, 0x6aa0, 0xad50, // 1960 
      0xab50, 0x4b60, 0xa570, 0xa570, 0x5260, 0xe930, 0xd950, 0x5aa8, 0x56a0, 0x96d0, // 1970 
      0x4ae8, 0x4ad0, 0xa4d0, 0xd268, 0xd250, 0xd528, 0xb540, 0xb6a0, 0x96d0, 0x95b0, // 1980 
      0x49b0, 0xa4b8, 0xa4b0, 0xb258, 0x6a50, 0x6d40, 0xada0, 0xab60, 0x9370, 0x4978, // 1990 
      0x4970, 0x64b0, 0x6a50, 0xea50, 0x6b28, 0x5ac0, 0xab60, 0x9368, 0x92e0, 0xc960, // 2000 
      0xd4a8, 0xd4a0, 0xda50, 0x5aa8, 0x56a0, 0xaad8, 0x25d0, 0x92d0, 0xc958, 0xa950, // 2010 
      0xb4a0, 0xb550, 0xb550, 0x55a8, 0x4ba0, 0xa5b0, 0x52b8, 0x52b0, 0xa930, 0x74a8, // 2020 
      0x6aa0, 0xad50, 0x4da8, 0x4b60, 0x9570, 0xa4e0, 0xd260, 0xe930, 0xd530, 0x5aa0, // 2030 
      0x6b50, 0x96d0, 0x4ae8, 0x4ad0, 0xa4d0, 0xd258, 0xd250, 0xd520, 0xdaa0, 0xb5a0, // 2040 
      0x56d0, 0x4ad8, 0x49b0, 0xa4b8, 0xa4b0, 0xaa50, 0xb528, 0x6d20, 0xada0, 0x55b0 // 2050 
  }; 
  // Array iLunarLeapMonthTable preserves the lunar calendar leap month from 1901 to 2050, 
  // if it is 0 express not to have , every byte was stored for two years 
  private static final char[] iLunarLeapMonthTable = { 0x00, 0x50, 0x04, 0x00, 0x20, // 1910 
      0x60, 0x05, 0x00, 0x20, 0x70, // 1920 
      0x05, 0x00, 0x40, 0x02, 0x06, // 1930 
      0x00, 0x50, 0x03, 0x07, 0x00, // 1940 
      0x60, 0x04, 0x00, 0x20, 0x70, // 1950 
      0x05, 0x00, 0x30, 0x80, 0x06, // 1960 
      0x00, 0x40, 0x03, 0x07, 0x00, // 1970 
      0x50, 0x04, 0x08, 0x00, 0x60, // 1980 
      0x04, 0x0a, 0x00, 0x60, 0x05, // 1990 
      0x00, 0x30, 0x80, 0x05, 0x00, // 2000 
      0x40, 0x02, 0x07, 0x00, 0x50, // 2010 
      0x04, 0x09, 0x00, 0x60, 0x04, // 2020 
      0x00, 0x20, 0x60, 0x05, 0x00, // 2030 
      0x30, 0xb0, 0x06, 0x00, 0x50, // 2040 
      0x02, 0x07, 0x00, 0x50, 0x03 // 2050 
  }; 
  // Array iSolarLunarTable stored the offset days 
  // in New Year of solar calendar and lunar calendar from 1901 to 2050; 
  private static final char[] iSolarLunarOffsetTable = { 49, 38, 28, 46, 34, 24, 43, 32, 21, 40, // 1910 
      29, 48, 36, 25, 44, 34, 22, 41, 31, 50, // 1920 
      38, 27, 46, 35, 23, 43, 32, 22, 40, 29, // 1930 
      47, 36, 25, 44, 34, 23, 41, 30, 49, 38, // 1940 
      26, 45, 35, 24, 43, 32, 21, 40, 28, 47, // 1950 
      36, 26, 44, 33, 23, 42, 30, 48, 38, 27, // 1960 
      45, 35, 24, 43, 32, 20, 39, 29, 47, 36, // 1970 
      26, 45, 33, 22, 41, 30, 48, 37, 27, 46, // 1980 
      35, 24, 43, 32, 50, 39, 28, 47, 36, 26, // 1990 
      45, 34, 22, 40, 30, 49, 37, 27, 46, 35, // 2000 
      23, 42, 31, 21, 39, 28, 48, 37, 25, 44, // 2010 
      33, 23, 41, 31, 50, 39, 28, 47, 35, 24, // 2020 
      42, 30, 21, 40, 28, 47, 36, 25, 43, 33, // 2030 
      22, 41, 30, 49, 37, 26, 44, 33, 23, 42, // 2040 
      31, 21, 40, 29, 47, 36, 25, 44, 32, 22, // 2050 
  }; 
  private static boolean bIsSolarLeapYear(int iYear) { 
    return ((iYear % 4 == 0) && (iYear % 100 != 0) || iYear % 400 == 0); 
  } 
  // The days in the month of solar calendar 
  private static int iGetSYearMonthDays(int iYear, int iMonth) { 
    if ((iMonth == 1) || (iMonth == 3) || (iMonth == 5) || (iMonth == 7) || (iMonth == 8) 
     || (iMonth == 10) || (iMonth == 12)) 
      return 31; 
    else if ((iMonth == 4) || (iMonth == 6) || (iMonth == 9) || (iMonth == 11)) 
      return 30; 
    else if (iMonth == 2) { 
      if (bIsSolarLeapYear(iYear)) 
        return 29; 
      else 
        return 28; 
    } else 
      return 0; 
  } 
  // The offset days from New Year and the day when point out in solar calendar 
  private static int iGetSNewYearOffsetDays(int iYear, int iMonth, int iDay) { 
    int iOffsetDays = 0; 
    for (int i = 1; i < iMonth; i++) { 
      iOffsetDays += iGetSYearMonthDays(iYear, i); 
    } 
    iOffsetDays += iDay - 1; 
    return iOffsetDays; 
  } 
  static int iGetLLeapMonth(int iYear) { 
    char iMonth = iLunarLeapMonthTable[(iYear - 1901) / 2]; 
    if (iYear % 2 == 0) 
      return (iMonth & 0x0f); 
    else 
      return (iMonth & 0xf0) >> 4; 
  } 
  private static int iGetLMonthDays(int iYear, int iMonth) { 
    int iLeapMonth = iGetLLeapMonth(iYear); 
    if ((iMonth > 12) && (iMonth - 12 != iLeapMonth) || (iMonth < 0)) { 
      System.out.println("Wrong month, ^_^ , i think you are want a -1, go to death!"); 
      return -1; 
    } 
    if (iMonth - 12 == iLeapMonth) { 
      if ((iLunarMonthDaysTable[iYear - 1901] & (0x8000 >> iLeapMonth)) == 0) 
        return 29; 
      else 
        return 30; 
    } 
    if ((iLeapMonth > 0) && (iMonth > iLeapMonth)) 
      iMonth++; 
    if ((iLunarMonthDaysTable[iYear - 1901] & (0x8000 >> (iMonth - 1))) == 0) 
      return 29; 
    else 
      return 30; 
  } 
  // Days in this year of lunar calendar 
  static int iGetLYearDays(int iYear) { 
    int iYearDays = 0; 
    int iLeapMonth = iGetLLeapMonth(iYear); 
    for (int i = 1; i < 13; i++) 
      iYearDays += iGetLMonthDays(iYear, i); 
    if (iLeapMonth > 0) 
      iYearDays += iGetLMonthDays(iYear, iLeapMonth + 12); 
    return iYearDays; 
  } 
  private static int iGetLNewYearOffsetDays(int iYear, int iMonth, int iDay) { 
    int iOffsetDays = 0; 
    int iLeapMonth = iGetLLeapMonth(iYear); 
    if ((iLeapMonth > 0) && (iLeapMonth == iMonth - 12)) { 
      iMonth = iLeapMonth; 
      iOffsetDays += iGetLMonthDays(iYear, iMonth); 
    } 
    for (int i = 1; i < iMonth; i++) { 
      iOffsetDays += iGetLMonthDays(iYear, i); 
      if (i == iLeapMonth) 
        iOffsetDays += iGetLMonthDays(iYear, iLeapMonth + 12); 
    } 
    iOffsetDays += iDay - 1; 
    return iOffsetDays; 
  } 
  // The solar calendar is turned into the lunar calendar 
  public static Date sCalendarSolarToLundar(int iYear, int iMonth, int iDay) { 
    int iLDay, iLMonth, iLYear; 
    int iOffsetDays = iGetSNewYearOffsetDays(iYear, iMonth, iDay); 
    int iLeapMonth = iGetLLeapMonth(iYear); 
    if (iOffsetDays < iSolarLunarOffsetTable[iYear - 1901]) { 
      iLYear = iYear - 1; 
      iOffsetDays = iSolarLunarOffsetTable[iYear - 1901] - iOffsetDays; 
      iLDay = iOffsetDays; 
      for (iLMonth = 12; iOffsetDays > iGetLMonthDays(iLYear, iLMonth); iLMonth--) { 
        iLDay = iOffsetDays; 
        iOffsetDays -= iGetLMonthDays(iLYear, iLMonth); 
      } 
      if (0 == iLDay) 
        iLDay = 1; 
      else 
        iLDay = iGetLMonthDays(iLYear, iLMonth) - iOffsetDays + 1; 
    } else { 
      iLYear = iYear; 
      iOffsetDays -= iSolarLunarOffsetTable[iYear - 1901]; 
      iLDay = iOffsetDays + 1; 
      for (iLMonth = 1; iOffsetDays >= 0; iLMonth++) { 
        iLDay = iOffsetDays + 1; 
        iOffsetDays -= iGetLMonthDays(iLYear, iLMonth); 
        if ((iLeapMonth == iLMonth) && (iOffsetDays > 0)) { 
          iLDay = iOffsetDays; 
          iOffsetDays -= iGetLMonthDays(iLYear, iLMonth + 12); 
          if (iOffsetDays <= 0) { 
            iLMonth += 12 + 1; 
            break; 
          } 
        } 
      } 
      iLMonth--; 
    } 
    Calendar cal = Calendar.getInstance();
    cal.set(iLYear, iLMonth-1, iLDay);
    return cal.getTime(); 
  } 
  // The lunar calendar is turned into the Solar calendar 
  public static Date sCalendarLundarToSolar(int iYear, int iMonth, int iDay) { 
    int iSYear, iSMonth, iSDay; 
    int iOffsetDays = iGetLNewYearOffsetDays(iYear, iMonth, iDay) + iSolarLunarOffsetTable[iYear - 1901]; 
    int iYearDays = bIsSolarLeapYear(iYear) ? 366 : 365; 
    if (iOffsetDays >= iYearDays) { 
      iSYear = iYear + 1; 
      iOffsetDays -= iYearDays; 
    } else { 
      iSYear = iYear; 
    } 
    iSDay = iOffsetDays + 1; 
    for (iSMonth = 1; iOffsetDays >= 0; iSMonth++) { 
      iSDay = iOffsetDays + 1; 
      iOffsetDays -= iGetSYearMonthDays(iSYear, iSMonth); 
    } 
    iSMonth--; 
    Calendar cal = Calendar.getInstance();
    cal.set(iSYear, iSMonth-1, iSDay);
    return cal.getTime(); 
  } 
} 